home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 June / EnigmA AMIGA RUN 08 (1996)(G.R. Edizioni)(IT)[!][issue 1996-06][EARSAN CD VII].iso / earcd / games2 / graalb.lha / 4.room < prev    next >
Text File  |  1996-03-28  |  6KB  |  128 lines
  1. /*                       This is a room file for GRAAL
  2. /*
  3. /*                                   4.room
  4. /*
  5. /*                     Ali's Fish Bait and Tax Free Shop
  6. /*
  7. /* RF 1 - number of times visited
  8. /* RF 2 - anything bought?
  9. /* RF 3 - need for phrase book felt?
  10. /* RF 6 - weather outside
  11.  
  12. SECTION: 1
  13.  
  14. UPDATE: 3
  15.  
  16. BG_IFF: 4BG.IFF
  17.  
  18. START_POS: 1;$800D;187;118;L;1
  19.  
  20. FLOOR: 1;148;116;194;119;1-1
  21.  
  22. EXIT: 1;191;71;193;119;190;118;Shop Exit
  23.  
  24. CLPART: 4FG.IFF
  25.  
  26. /* 1 is counter
  27. ROOMBOBS: 1;1;3;3;15;20;0;1
  28. /* 2-4 is Ali Harrod sideways, talking
  29. ROOMBOBS: 3;2;32;8;18;31;24;0
  30. /* 5-6 is Ali crouching behind the counter
  31. ROOMBOBS: 2;5;104;8;18;31;24;0
  32. /* 7 = World map
  33. ROOMBOBS: 1;7;16;52;13;8;0;0
  34. /* 8 = Phrase Book
  35. ROOMBOBS: 1;8;16;45;10;6;0;0
  36. /* 9 = Barrel of mead
  37. ROOMBOBS: 1;9;1;44;13;14;0;0
  38. /* 10-14 Llama
  39. ROOMBOBS: 5;10;0;67;45;59;45;1
  40. /* 15-17 Spit
  41. ROOMBOBS: 3;15;0;132;10;15;10;-8
  42. /* 18 Ali handing over something
  43. ROOMBOBS: 1;18;150;8;26;31;0;0
  44.  
  45.  
  46. ROOMOBJ: 1;llama;4;0;58;A 0,(RBOB10,348)(RBOB11,24)(RBOB12,12)(RBOB13,12)(RBOB14,48)(RBOB13,12)(RBOB12,12);128;62;0;0;0; ;0;7;0;1;MID;AV;a;this;the
  47. ROOMOBJ: 2;llama spit;4;0;57;S: A 1,(RBOB15,420)(RBOB16,12)(RBOB17,12)(RBOB15,24) M 0,0,396 M 50,0,12 M 0,0,36 M -50,0,0 M 0,0,24 J S;0;0;0;0;0; ;0;6;0;0;MID;-D; ; ; 
  48.  
  49.  
  50. STATIC: 40;RBOB1;134;101
  51.  
  52. /* Check if Olaf is a small guy and if so, restore him
  53. DACT: IFRF 0,1=1;CUTSCENE 17,H
  54.  
  55. /* Set number of times visited
  56. DACT: ADDRF 1
  57.  
  58. /* Add Ali question to bartender dialogue
  59. DACT: IFOF 5,3=0;SETOF 5,3=1
  60.  
  61. /* Check the weather
  62. DACT: IFRF 6=1;COLOUR DLY,16,$678;COLOUR DLY,17,$555
  63.  
  64. DACT: TRACK Seagulls.track,LOOP,FILTER
  65. DACT: SHOW 7,125,117,A 4,(RBOB5,24)(RBOB6,24)(RBOB5,36)(RBOB6,42)
  66. DACT: LIGHTS ON
  67. DACT: MOBJ 7;W 100;SHOW 7, , ,DEF;W 25
  68. /* Versions of Ali's greeting procedure (depending on number of times
  69. /* shop has been visited) follow below.
  70. DACT: IFRF 1=1;RESP S,4,Ah - a customer!;W 25;RESP S,4,Welcome, Captain, to the largest shop in the whole world!;OBJ1 7;DSET 4,+1,+2,+3;EXIT
  71. DACT: IFRF 1=2;RESP S,4,Welcome back to Ali Harrod's magnificent boutique, Captain!;OBJ1 7;DSET 4,+12;EXIT
  72. DACT: IFRF 1=3;RESP S,4,Well, aren't you the lucky one!;RESP S,4,You see, I have a campaign right now. My third visitor each day gets a free gift!
  73. DACT: IFRF 1=3;RESP S,4,True enough, you have been the ONLY visitor, three times in a row...
  74. DACT: IFRF 1=3;IFRF 2=0;RESP S,4,...and you haven't actually BOUGHT anything yet...
  75. DACT: IFRF 1=3;RESP S,4,...but promises are promises! Therefore, I present you with this valuable gift!;OBJ1 7;SHOW 7,125,117,RBOB18;HANDLE;GET 27,U;W 100;SHOW 7,123,117,DEF;HANDLE -1;DSET 4,+10;EXIT
  76. DACT: RESP S,4,Yes, it's the magic of Ali Harrod's shopping emporium that does it...;RESP S,4,You just can't stay away, can you?
  77. DACT: RESP S,4,You have now been to my establishment no less than #R#4#1# times!;OBJ1 7;DSET 4,N10;EXIT
  78.  
  79.  
  80. /* Ali dialogue
  81. LINE: 4;1;So, where are the shelves?; ; 
  82. LACT: 4;1;RESP S,4,No shelves needed, sir...;W 25;RESP S,4,I have everything right here behind the counter.;W 25;RESP S,4,After all...;RESP S,4,This is no department store!;DSET 4,N1
  83. LINE: 4;2;Have you ever heard about "delusions of grandeur"?; ; 
  84. LACT: 4;2;RESP S,4,Sure, I have a very nice perfume with that name for sale... Tax free, of course!;DSET 4,N2
  85. LINE: 4;3;I don't think this shack can be the largest ANYTHING, really.; ; 
  86. LACT: 4;3;RESP S,4,Ah! But believe me, Ali Harrod - that's me - stocks everything you could possibly want!;DSET 4,N1,N2,N3,+4,+5,+6,+7,+8,+11
  87. LINE: 4;4;Do you have a barrel of really GOOD mead?; ; 
  88. LACT: 4;4;RESP S,4,Of course.;BOBOFF 58;BOBOFF 57;CUTSCENE 5,H;BOBON 58,135,103,RBOB9;RESP S,4,Do you have 8 silver pieces?;DSET 4,+5,N4,N9
  89. LINE: 4;5;I'll come back later, OK?;I think I'll say goodbye for now.; 
  90. LACT: 4;5;RESP S,4,Customers are always welcome back!;W 25;CMOVE 190,118,C;EDLG;GOTO 3,2;EXIT
  91. LINE: 4;6;Do you have a good dictionary?; ;IFRF 3=1
  92. LACT: 4;6;RESP S,4,Of course.;BOBOFF 58;BOBOFF 57;CUTSCENE 5,H;BOBON 58,135,103,RBOB8;RESP S,4,That will be one copper coin, please.;DSET 4,S1,+9,+15
  93. LINE: 4;7;Do you have a map of the world? I'm kind of lost.; ; 
  94. LACT: 4;7;RESP S,4,Of course.;BOBOFF 58;BOBOFF 57;CUTSCENE 5,H;BOBON 58,135,105,RBOB7;RESP S,4,This map is completely unique.;RESP S,4,In fact, ALL my world maps are unique and quite different from each other.
  95. LACT: 4;7;RESP S,4,That is why each one costs 30 gold pieces.;DSET 4,-9,N7
  96. LINE: 4;8;What I really need is some transport out of this place!; ; 
  97. LACT: 4;8;RESP S,4,Of course.;RESP S,4,I think a medium sized llama would fill your needs perfectly.;BOBOFF 58;BOBOFF 57;CUTSCENE 5,H;SHOW ROBJ1,128,62,DEF;SHOW ROBJ2,133,60,DEF
  98. LACT: 4;8;RESP S,4,It's yours for only 100 gold pieces. Be careful, it spits a lot.;DSET 4,N8,-9
  99. LINE: 4;9;Oh, great! Something I can afford - I'll take it!; ; 
  100. LACT: 4;9;RESP S,4,Very good, captain. Here you are.;SHOW 7,125,117,RBOB18;BOBOFF 58;HANDLE;GET 30,N;REMOVE SOBJ2,N,0;SETRF 2=1;W 50;SHOW 7,123,117,DEF;HANDLE -1;DSET 4,R1,N6,N9,N15
  101. LINE: 4;10;Thank you very much. I'll pop outside and examine my gift now!; ; 
  102. LACT: 4;10;RESP S,4,Remember - No-one beats Ali Harrod's when it comes to value for money!;CMOVE 190,118,C;EDLG;GOTO 3,2;EXIT
  103. LINE: 4;11;OK, I would like to trade some items with you.; ; 
  104. LACT: 4;11;RESP S,4,Sorry, it's cash only if you want to buy something here, I'm afraid.;RESP R,4,It's not that I don't trust you, but...;RESP R,4,Hmm...;RESP R,4,...as I said, it's cash only!;DSET 4,N11
  105. LINE: 4;12;I saw a big sign outside - what is the special offer?; ;IFRF 3,7=1
  106. LACT: 4;12;RESP S,4,We have the most magnificent sale!;RESP S,4,Half the price on all fireplaces, furnaces, stoves and central heating!;DSET 4,S1,N12,+13,+14
  107. LINE: 4;13;In this heat???; ; 
  108. LACT: 4;13;RESP S,4,Yes, naturally.;RESP S,4,Would be a bit silly to have it in the wintertime when people buy them anyway, you know!;DSET 4,R1
  109. LINE: 4;14;Darn, I though I would be able to pick up something useful!; ; 
  110. LACT: 4;14;RESP S,4,Well, better luck next time!;DSET 4,R1
  111. LINE: 4;15;Gosh, that's all the money I have - I'll have to think about this!; ; 
  112. LACT: 4;15;RESP S,4,Very good, captain. Take your time.;BOBOFF 58;CUTSCENE 5,H;DSET 4,R1
  113.  
  114. /* No room actions in this room, 
  115. /* because we are in dialogue mode all the time
  116. /* Action 0 - Exit
  117. /* Action 1 - Give
  118. /* Action 2 - Pick up
  119. /* Action 3 - Use
  120. /* Action 4 - Open
  121. /* Action 5 - Talk to
  122. /* Action 6 - Pushb
  123. /* Action 7 - Close
  124. /* Action 8 - Look at
  125. /* Action 9 - Pull
  126.  
  127. /* End of room file.
  128.